home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1995 #5 & #6
/
Amiga Plus CD - 1995 - No. 5 and 6.iso
/
pd
/
daten
/
twistdemo
/
music
/
playtrack5.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1995-01-13
|
731b
|
28 lines
/* $VER: 1.2 © 1994 by Frank Würkner. Show current position. */
SIGNAL ON SYNTAX /* check syntax */
SIGNAL ON ERROR /* check if command succeeds */
OPTIONS FAILAT 6 /* ignore warnings */
ADDRESS 'YACDP' /* send to YACDP */
/* -------------------------- BEGIN OF YOUR CODE ------------------------- */
'GETVAR STATUS'
if (STATUS > 2) then do
'PLAYTRACK 5'
end
/* --------------------------- END OF YOUR CODE -------------------------- */
EXIT
SYNTAX:
SAY "AREXX error at line" SIGL ":" ERRORTEXT(RC)
EXIT
ERROR:
SAY "YACDP error at line" SIGL ":" ERR
EXIT